ME eee ees eeSSS I UULSseEE FE CELE TELETE | 


<a a << OC OK OC Oe 
2 2 2 © @ 4 =< x oC 
<< << OC OC OK OK 
=< =< << 
=< =< 
, 2? 2 4 =< =< 
3K RC BS 
o paaeeabed 
== 
< e >< ot oe 
>< ot ee = oe Oe Ot 
. 2 2 + + ¢ 4 >< OC OK OK OK 
ee 
-—— 


ee 
a 
ee 


oe on 
-—— -——— 
re cn 
-—— 
-—— 
-—— 


Seal anal sensi eel canal cei and ane see elk elk sone soe cen reek eee oe oe ae ae 
i 
foul eee cel eel cel ell cell ell eel eek eel el ol ee eel eh lh ce ee oe od 


be OA Ge bt be ee kk hk ek LA kt ka 
a a a ed OO OO 
ee a a a a ed 2 oe ae Oe 


eeF [LE*®*# 1] De eSNDERL 


SSSSSSSS_ NN NN DDDDDDDD 
SSSSSSSS_ NN NN DDDDDDDD 
S$ NN NN DD DD 
SS NN NN DD DD 
SS NNNN NN DD DD 
SS NNNN NN DD DD 

SSSSSS NN NN WN DD DD 
SSSSSS NN NN NN DD DD 
SS NN NNNN OD DD 
SS NN NNNN DD DD 
SS NN NN DD DD 
SS NN NN DD DD 
SSSS5SSSS NN NN DDDDODDD 
SSSSSSSS NN NN DDDDDDDD 
LL IIIT] SSSSSSSS 
LL HII SSSSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I! SS 
LL I] SS 
LLLELLLLLLL 1ilil] SSSSSSSS 
LELLLLLLLL T1111 SSSSSSSS 


—____—_—— 


10 
39:15 AX-11 Bliss-32 V4.0-742 P 1 
Bejan 8:23:48 7 


F11X.BUGSRC CiSNoER L.832;1 (1) 


; ; 0) MODULE SNDERL ( Laan UAGE (0.15832) 

3001 'EAD0210 0008 IDENT voe 15876 

: 4-1 004 )e 

; 5 0005 1 BEGIN 

3 6 0006 1 

: 7 0007 1! 

s 8 0008 31 !eeeneeeneerenereneeeneneereeeeeeeeereeeeetereeeretereneeeteneteeeeetereeeeee 

3 % 0009 1 ! a 

$ 10 0010 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 8 * 

; 11 0011 1 !* DIGITAL EQUIPMENT EORPORATION, MAYNARD. MASSACHUSETTS. * 

3 \ Bag : - ALL RIGHTS RESERVED. * 

Ps ; @ 

: 14 0014 1 !* THIS hie iS FURNISHED UNDER A LICENSE AND MAY BE USED AND copiee * 

: 15 0015 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®* 

; 16 0016 1 !* INCLUSION OF THe ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 

: 17 0017 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY ®* 

: 18 0018 1 !* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE {S$ HEREBY * 

: y bos ' * TRANSFERRED. “ 

3 it ® 

Bo a 0021 1 !* THE ge IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 

5; @ Bo8¢ 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT ®* 

3 Si it : * CORPORAT 1ON. ® 

3 it * 

é 25 0025 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS ®* | 

3 26 0026 1 '* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 

: 2? 0027 1 !« e | 

; «ee 0028 1 !« * 

s 29 0029 1 Neeeererereneeeereeeeeeeee eRe eHeeHeeee HEH eee eeneeeeeeneaReeeneeneeenene 

: » 0030 1 

= 0031 1 !+44 | 

aa 0032 1! 

3 33 0035 1! FACILITY: FIIACP Structure Level 1 

3 3G 0034 1! 

; 35 0035 1 ! ABSTRACT: 

3 36 0036 1! 

; i 0037 1! This routine sends a message to the error logger to inform it of a 

; m@ 0038 1! volume mount or dismount. 

; 39 0039 1! 

; 40 peed ’ ENVIRONMENT : 

; 4 Bees 1? STARLET operating system, including privileged system services 

a * 00463 1! and internal exec routines. 

; | (46 0044 1! 

: 45 0045 1 !-- 

; 46 0046 1! 

; «47 0047 1! : 

2 m4 apes : AUTHOR: Andrew C. Goldstein, CREATION DATE: 23-Jun-1978 18:47 

: 9 BRe0 : MODIFIED BY: 

3001 !€AD0210 26 1! v04-001 EAD0210 Elliott A. Drayton 16-Nov-1984 

300 TEARS IS 00535 1! Add code to log gee name. 

3003 '€aD0210 0054 1 |! 

3 6 0055 1! v03-001 LMP0221 27-Mar-1984 14:46 

- § B036 1! Cha 33° PRG a _ownbic” te ‘ORB mOUNER and UCB$W_VPROT to 

0057 1: ORBS 

| 
| 
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vO04- “0¢t-1984 12:4 F11X.BUGSRCJSNDERL. B32;1 (1) 
- ; 0058 1! | 
= 0059 1! A0101 acco Andrew C. Goldstein, 15-Jan-1980 22:58 
; 2, Beet : itl im volume set data in error log message | 
; WW poet 1} A0100 ACG00001 Andrew (. Goldstein, 10-Oct-1978 20:03 
; @& 0065 1! Previous revision history moved to F11A.REV | 
; 6 6 0064 1 !ee 

; § 0065 1 

ma 0066 1 | 
; 64 0067 1 LIBRARY ‘SYSS$LIBRARY:L1B. L32"; 

; 65 0068 1 REQUIRE 'SRCS$:FCPDEF.832'; 
: 66 1059 (1 

; or 1060 1! : ; 

: r+ M4 6d : This routine is called at raised IPL and must be locked into the working set. 

; 1063 1 

. 1064 1 LOCK_CODE; 
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v04-001 -0¢t-1984 12:43:39 F11X.BUGSRCISNDERL B32; 1 (2) 
oe 1065 1 GLOBAL ROUTINE SEND_ERRLOG (MODE, UCB) = 
s 7% 1308 1 
ca. 1067 1 !+4+ 
; 1068 1! 
; a 1968 } FUNCTIONAL DESCRIPTION: 
;. 1071 1! This routine sends a message to the error logger to inform it of a 
; 80 1976 1 | volume mount or dismount. 
: 8 1075 1! 
—: § 1074 1! 
oo’) = 1075 1 ! CALLING SEQUENCE: 
: 84 1978 4% SEND_ERRLOG (ARG1, ARG2) 
; 8 1077 1! 
; & 1078 1 ! INPUT PARAMETERS: 
; 687 1079 1! ARG1: 1 to signal mount 
; & 1080 1! 0 to signal dismount 
>; «689 1081 1! ARGS: address of UCB 
; 1 1! 
SD » 1083 1 ! IMPLICIT INPUTS: 
:; 9 1084 1! NONE 
; 1085 1! 
3 94 1086 1 ! OUTPUT PARAMETERS: 
; 1087 1! NONE 
; © 1088 1! 
a: ~ oF 1089 1 ! IMPLICIT OUTPUTS: 
; #6298 1090 1! NONE 
; 1091 1°! 
; 100 44 1 ! ROUTINE VALUE: 
3s 191 1093 1! 1 
: 102 1094 1! 
3 103 1095 1 ! SIDE EFFECTS: 
: 104 1096 1! Message sent to error logger 
; 105 1097 1! 
: 106 1098 1 !-- 
: 107 1099 1 
: 108 1100 2 BEGIN 
; 109 1101 
s 110 1196 MAP 
3 4 see uCcB : REF BBLOCK; ! UCB argument 
3 118 1105 LINKAGE 
3 (116 1106 L_ERL_ALLOC = JSB (REGISTER = 1) : 
3: 6115 1107 GLOBAL (ADDRESS = 2) 
3 116 1198 NOTUSED (3, 4, 5, 6, 7, 8. 9, 10, 11), 
; 118 1110 LLERL_RELEASE = JSB (REGISTER = 2) : 
s 19 1111 <gifillna NOTUSED (5, 4, 5, 6, 7, 8, 9, 10, 11); 
: 120 Wiig 
2 1s 111 LOCAL 
:..122 1114 ORB : REF BBLOCK, ! local address of ORB 
3001 !EAD0210 1115 MSG_BUFFER : REF BBLOCK, ! other buffer pointer to Codge MOVC 
2006 '€AD0210 Hb STRING : REF VECTOR C,BYTE), ! Used for byte access to a string 
3003 !€AD0210 =111 STRING_START : REF VECTOR (,BYTEJ, ! Address pointer into msp_ butter 
3006 !EADO 18 1118 LENGTH OFFSET : BYTE, ! Used to add offset to string length 
3005 !€AD021 1119 NAME _OFF SET : LONG : Used to add offset to device name addr 
£006 iEAD0210 1120 : REF BBLOCK; | Used to access DDB 
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EXTERNAL ROUTINE 
ERLSALLOCEMB 


! allocate error Log 
ERLSRELEASEMB =: L_LERL RELEASE ADDRESSING _MODE (GENERAL); 
! release error log buffer 


11 
-Jan-1985 18:39:15 AX-11 Bliss-32 V4.0-742 
B-Jan-1985 1 33:48 LP TIX. BUGSREISMDERE B20 
: LLERL_ALLOC ADDRESSING MODE (GENERAL) 
‘ buffer 


Allocate an errror log buffer. If this fails, forget it. 


BEGIN 
GLOBAL REGISTER 
ADDRESS e2: 


REF BBLOCK; ! pointer to error log buffer 


IF NOT ERLSALLOCEMB (EMBSK_VM_LENGTH) 


THEN RETURN 1; 
MSG BUFFER = .ADDRESS; 


Now fill in the message buffer. 


IF MODE 
THEN MSG_BUFFERCEMBSW_VM_ENTRY 
ELSE MSG_BUFFERLEMBSW_VM_ENTRY 


ORB = ,UCBCUCBSL_ORB); 
MSG_BUF FERCEMBSL—VM_OWNUIC 
MSG_BUF FERCEMBSL—~VM_ERRCNT 
MSG_BUF FERCEMBSL —VM_OPRCNT 
MSG_BUF FERCEMBSW_VM~UNITJ 
SG_BUF FERCEMBS\_VM_VOLNUM 
MSG_BUF FERCEMBSW_VM_NUMSET 


EMBSK_VM 
EMBSK_VD; ! log entry type 


-UCBCUCBSW~ERRCNTI; 
-UCBCUCBS$L~OPCNTI; 


batt OWNER]: 
[UCBCUCBSW-UNITJ; 


0; 
0; 


STRING = OS RUF FERCERBIS._ WS. NGI; 


STRING (0) = 
DDB = .UCBCUCBS$L_pDB); 


IF .DDBCODB$i_SB) NEQ 0 
THEN 


! If there is a system block : 
he pecs name string is NEQ 0 


! then if t 
Nts C.DDBCDDB$L_SB], SBST_NODENAME])<0,8> NEQ 


BEGIN 
CHSROVE (, (BBLOCK 
BBLOCK f 
hae 

= STR 


STRING fo . 
» STRING 


STRING 
END; 


IF .STRINGCO) GTR O 
THEN 


1; ° 


: Copy the strin 
L $8) SBST_NODENAME])<0,8> + 1, 
, SB$T_NODENAME), 


1; ' Bump the string count by 1 
Le Append a *$° ° . 


= STRINet -STRINGCO) + 1 J; 


a 
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END: 
CHSMOVE (vcass VOLNAN 
{.0ce UCBet vcB) ypest _VOLNAME), 
Bee OBUFFEREEMSSs _VA_LABELJ 


V04= “Oct-19 :39 F11X.BUGSRCISNDERL.B32;1 (2) 
3023 !EAD021 117 END 
3024 'EAD021 1 E 
3025 'EAD021 1 BEGI 
3026 'EAD021 1 STRING_START = MSG_BUFFERCEMBSB_VM_NAMLNG); 
0 'EADO21 1 LENGTM_OFFSET = 1; 
028 'EAD021 1 NAME _OFFSET = 0; 
029 'EAD021 1 END; 
030 'EAD021 1 
031 'EAD021 1 CHSMOVE (.(BBLOCK C.UCBCUCBS 8st NAME])<0,8> + zbENGTH OFFSET, 
0 ¢ 'EADO?1 1 BBLOCK C. ucohy yeose BSL_ 15988 _NAME] + .NAME OFFSET, 
033 'EAD0210 1 STRING_STARTCOJ); 
034 'EADO 19 1 
035 geQd0 1 19 STRING CO] = .STRING CO) + .(BBLOCK C.UCBCUCBS$L_DDBJ, DDBST_NAME])<0,8>; 
4 19 IF aBeLocKCuce UCBS$L_DEVCHAR] ,DEV$V_FOR] 
? + OR -BBLOCKCUCBCUTBSL _DEVCHAR], DEv$v_sa0) 
7 19 "BEGIN 
8 19 LOCAL 
9 19 vcB : REF BBLOCK, ! address of volume control block 
y i RVT : REF BBLOCK; ' address of relative volume table 
§ 20 vcB steBSueRY CB); 
20 IF ave VCB$W_RVA) NEQ 0 
4 0 ine 
5 NBEGIN 
6 RVT = .VCBCVCBSL_RVT); 
? MSG_BUFFER EMBSU- VM_VOLNUM] = .VCBLVCBS$W_RVNI; | 
g MSG_BUFFERCEMBSW_VM_NUMSET] = .RVTCRVT$B-NVOLS); 
0 
4 
5 
6 
7? 
8 
9 
0 
} 
3 
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$8 
0 
20 
20 
20 
20 
21 
21 
21 
21 ELSE 
21 BEGIN 
21 LOCAL 
21 MVL : REF BBLOCK, ' magtape volume Labels 
él MVL_ENTRY : REF BBLOCK, ! address of label entry 
ra RUN, ! relative unit number 
21 RVT : REF BBLOCK, ' relative volume table 
$$ UCBLIST : REF VECTOR, ' address of UCB List 
Ps vcB REF BBLOCK; ' volume control block 
§ vCB = Ucar Uses. vce): 
94 RVT = VTERY 
95 g UCBLIST = RvVT nVTSL Masti 
96 é MVL = .VCBCVCBS$ 
97 22 MSG_BUFFER Ht ie vn NUMS BY HHT VL$B_NVOLS); ' no of volumes in vol set known 
98 § CHSFILL(* *,vCBSS_VOLNAM SG bur FERCEMB mest. _VM_LABELJ); 
99 INCR I FROM y TO “hvitavige “NVOLS] - 1 DO ~ 
00 § SEGIN 
01 RUN = 
0¢ 2 Vee ue atisre. 1] EQL .UCB THEN EXITLOOP; 
04 MVL_ENTRY = .MVL + MVLSK_FIXLEN; 
05 INCR I FROM 0 TO .MVLCMVC$B_NVOLS) -1 DO 
06 3 BEGIN 


see b- ann’ 51 133 \3 AX=11 Bliss=32 V4.0-742 Page 6 


v0G= -0¢t-1984 1 F11X.BUGSRCISNDERL.B32;1 (2) 
: 207 1 4 Hi -MVL_ENTRYCMVLS$B_RVN] EQL .RUN 

08 4 AND -MVC_ENTRYCMVLS$V_MOUNTED) 

: 210 1 § BEGIN 

; 211 1240 MSG_BUFFERCEMB$W_VM_VOLNUM) = ri « 1; 

3 \¢ 1241 CHSCOPY (MVL$S Avocet Av PENT RYCMVL$T V OL Let } mw 

> 21 1 4¢ VCB$S_VOLRAME ,MSG_BUP""RCEMBST_VA_LABELJ5; 

; 6 ' 43 ; EXITLOOP: 

: 216 1045 4 Api = .MVL_ENTRY * MVLSK_LENGTH; 

> 217 1 46 ps eNDE 

| ee 

; $50 : rs ! Fiat release the buffer and make the entry. 

: 1251 

; 33 2 ERLSRELEASEMB (.MSG_BUFFER); 

3 35 1254 RETURN 1; 

> der 1256 1 END; ! end of routine SEND_ERRLOG 


- TITLE th tie 
-IDENT \v04=001\ 


-EXTRN ERLSALLOCEMB, ERLSRELEASEMB 
~PSECT SLOCKEDC1$,NOWRT,2 


07FC 00000 .ENTRY SEND_ERRLOG, Save R2,R3,R4,R5,R6,R7,RB,R9.= ; 1065 
51 3E DO 90002 MOVL. #62, R1 > 1136 
000000006 0 if 0000 JSB ERLSALLOCEMB : 
03 20 § 00008 BLBS = RO, 1 : 
0151 31 OO000E BRW 1 : 
59 > a 09 0011 1$: MOV. § ADDRESS, MSG_BUFFER + 1138 
07 Os AC f 0014 BLBC : + 1144 
04 a9 40 8F 98 00018 MOVZBW #64, 4(MSG_BUFFER) > 1145 
05 11 0001D BRB 3 : 
06 ad 41 8F 98 OO1F a8: MOV2Se #65, 4(MSG_BUFFER) + 1146 
50 08 ac OD 0 4 3$: MOVL uC 0 : 1148 
50 1¢ a0 dO 00028 MOVL (RO), ORB : 
10 Ag 60 D 6 MOVL (ORB), 16(MSG_BUFFER) : 1149 
50 A MOVL ug RO : 1150 
4 Ad 00 C 0 MOVZWL (RO), 20(MSG_BUFFER) ; 
50 AC DO O003A MOVL UCB, RO > 1151 
18 «A9 AO D MOVL  112(R0), 24(MSG_BUFFER) ; 
50 9 AC D 4 MOVL UCB RO + 1152 
1c | AD 4 Aad B 4 MOVW 4(RO), 28(MSG_BUFFER) : 
gr p4 4C CLRL 46 (NSG_ UFFER) > 1154 
66 AD 9E 0004F MOVAB 30(R9) : 1157 
66 94 CLRB (STRING) : 1158 
8 AC D MOVL UCB, R : 1159 
AO DO MOVL 40(RO) ope : 
4 ad Dd 9 D MOVL  52(DDBS, R > 1161 
19 13 00061 BEQL = 4 : 


SeG@e Ge Se Ge Ge Ge Se Se Ge Be Be Ge Ge Ge Se Se Se Se ee Ge Fe Ge Fe Se Be Se Ge Be Be Se Se Be Se Ge Be Se Se Ge Se Se Be Be Oe Be Be Be BE Be ee 
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v04=001 Set t 1 23:48 LPT Tx BUGSRCISNDERL B20 9 02) 
44 Ad 63 TSTB = 6B (RO) : 11 
14 23 8 BEQL 4 : = 
51 46 A0 94 000 : ROVZBL : (RO), R1 + 1166 
66 44 AO 3 § $ MOVC3 R1, 68(RO), (STRING) + 1168 
66 96 INCE (STRING) : 1169 
50 $6 A 0007 MOVZBL (STRING) RO + 1170 
6046 4 7 MOVB #36, (ROSCSTRING) ; 
66 9 7C 4$: TSTB (STRING) : 1173 
14 007 BEQL =§ : 
50 $6 9A 00 mOVZgL (STRING), RO + 1176 
29 60 00 ADDL STRING, RO ; 
01 AO 9E 0 MOVAB (RO), STRING_START : 
53 94 0 A CLRB — LENGTH_OFFSET : 1177 
51 01 DO 0008C¢ MOVL #1, NAME_OFFSET : 1178 
9 11 00 F BRB 68 : 117 
52 1€ a9 3 091 5$: MOVAB (R9), STRING START : 1188 
5 gt 90 00095 MOVB #1, LENGTH OFFSET : 118 
1 04 00098 CLRL NAME _OF FSET 3: 1184 
50 08 AC 00 009A 6$: MOVL. UCB, ~RO + 1187 
50 28 CO 0009E ADDL2 #40, RO ; 
50 60 po OA} VL. —s (ROS, RO ; 
54 14 A0 A 0004 MOVZBL 20(RO), R& : 
53 2 9A QOOA8 MOVZ7BL LENGTH_OFFSET, R3 3 
53 4 £0 OOAB ADDL _R ; 
62 14 A140 53 OOAE MOVCS R3, 20(NAME_OFFSET)CROJ, (STRING_START) : 1189 
50 08 AC 00 00084 MOVL : 1191 
50 28 = AO b0 0088 MOVL  40(RO), RO : 
66 14 AO 80 000BC ADDB2 20(RO). (STRING) : 
51 08 AC 00 000C0 MOVL UCB, Rf : 1201 
50 08 AC DO 000C4 MOVL uc 0 : 1193 
05 AO €8 000C8 BLBS (RO) 7$ : 
27 38 = AO 05 €0 000cC BBS #5, 56(RO), 98 + 1196 
50 34 Al DO 00001 7s: MOVL 52¢R1), VCB ; 1201 
0& Aad B 9005 TSTw ©. 14¢vcBS + 1202 
0 1 D8 BEQL 8 : 
51 0 AO 00 OOODA MOVL 2(VCB), RVT > 1205 
A: a9 —E A : 00 MOVW  14(VCB), 46(MSG_BUFFER) > 1206 
Ag Al 3 MOVZBW 11(RVT), 48(MSG_BUFFER) : 1207 
50 08 AC DO £8 8$: MOVL ce RO + 1210 
50 4 Ad eC MOVL (RO), RO ; 
32. Ad 16 AO 0c OF MOVC3 He, 26(R0), SO(MSG_BUFFER) : 1211 
61 11 r6 BRB 1 : 1193 
0 34 Al 06 OF 98: MOVL ; (R1), VCB : 1222 
0 Ao p FC MOVL (VCBS, RVT : 1 
4a OM ; 1 MOVAB : (R6), UCBLIST > 1226 
5 34 «OA 1 MOVL (vcBs, mvt > 1225 
30 Ag 08 A 1 pveee 11(MVL), 48°(MSG BUFFER? s $ 
oc 20 6E - 0 ¢ vcS #0, (SPS, #32, #12, SO(MSG_BUFFER) : 1 
1 0B A6 9A 0011 MOVZBL 11(RVT), R1 : 1228 
0 1 CF 118 MNEGL #1, | > 1231 
A 118 BRB 11¢ : 
SA : DO 0011D 10$: MOVL I, RUN : 133 
08 Ac 684 D4 1 CMPL gBLISTOC1I, UCB : 1 
4 3 1 BEQL 1 3 
F2 50 1 £2 00127 11$:  AOBLSS R1, I, 108 > 1228 
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SNDER 5 AX=11 Bliss-32 V4.0-742 
y04=001 bo dan- 1984 1 33: ¥ F11X.BUGSRCISNDERL.B32;1 
4 A? 9E 00128 128:  MOVAB 36(R7), MVL_ENTRY 
3 86 A7 of 10F MOV ZBL i$ AWS, Roo 
8 01 fF 133 MNEGL #1 
1D 1 RB 156 | 
SA 06 As 08 jf if 138: CHPZV #0, #8, 6(MVL_ENTRY), RUN 
O€ 07 AB CE 145 LBC. 9 7(MVL ENTRY) « 
2 «Ad 56 01 Al 00144 ADDW3 #1, I> 46(MSG Prem) 
0c 20 5B - 06 2c O49 MOVCS #6, (MVL GUmSE BU #32, #12, SO(MSG_BUFFER) 
7 11 0015 BRB 16 
58 8 C9 1) 14$:  ADDL2 a8, MVL_ENTRY 
DF 6 F2 00155 15$:  AOBLSS R 
52 59 DO 00159 16$:  MOVL MSG BUFFER, R2 
000000006 00 16 0015 JSB ERLSRELEASEMB 
50 01 00 0016 17$:  MOVL #1, RO 
04 0016 RET 

; Routine Size: 358 bytes, Routine Base: S$LOCKEDC1$ + 0000 
: 228 1257 1 
> 229 1258 1 END 
: 230 1259 0 ELUDOM 
: PSECT SUMMARY 
3 Name Bytes Attributes 
: S$LOCKEDC1$ 358 NOVEC,NOWRT, RD, EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 
3 Library Statistics 
: nee eanee Symbols weeececn Pages Processing 
: File Total Loaded Percent Mapped Time 
: _$255$DUA18:CSYSLIBILIB.L32;1 18619 56 1000 00:02.0 


3; Size: 


COMMANY QUALIFIERS 
é BLISS/CHECK=(FIELD, INITIAL ,OPTIMIZE)/LIS=LIS$:SNDERL/OBJ=OBJ$:SNDERL MSRC$:SNDERL/UPDATE=(BUG$: SNDERL) 
358 code + 0 data bytes 


1236 


Id afatatad ot-d08 
POM POPUMOT) ROPOTO 
Vi VIWEwW Pw 
of MFO NRwO~N 


SNDER 

vou=001 

; Run Time: 215. 
: Elapsed Ti 80; 9. . 
3 Lines/CPU Min 4774 

3 Lexenes/CPU-Kin: 20553 

3 wow Used: 214 pages 
; _ ation Complete 
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